''========================================================
'' Autor: 		Luis Antonio Lara Capetillo
'' Fecha Creación: 	22/11/2012
'' Descripcion: 	Clase Componente ctlFormatoUnicoResponsable
''========================================================

Public Class ctlFormatoUnicoResponsable

  Inherits System.Web.UI.UserControl
#Region "Propiedades"
  ''' <summary>
  ''' Obtiene o estable el valor Patente del TextBox txtPatente
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Patente() As String
    Get
      Return Me.txtPatente.Text
    End Get
    Set(value As String)
      Me.txtPatente.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Obtiene o estable el valor Empresa_Proveedora del TextBox txtEmpresa_Proveedora
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Empresa_Proveedora() As String
    Get
      Return Me.txtEmpresa_Proveedora.Text
    End Get
    Set(value As String)
      Me.txtEmpresa_Proveedora.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Obtiene o estable el valor Representante_Legal del TextBox txtRepresentante_Legal
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Representante_Legal() As String
    Get
      Return Me.txtRepresentante_Legal.Text
    End Get
    Set(value As String)
      Me.txtRepresentante_Legal.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Obtiene o estable el valor Nombre_Responsable del TextBox txtNombre_Responsable
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Nombre_Responsable() As String
    Get
      Return Me.txtNombre_Responsable.Text
    End Get
    Set(value As String)
      Me.txtNombre_Responsable.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Habilita o Desabilita el Control para Edicion
  ''' </summary>
  ''' <value>True o False</value>
  ''' <remarks></remarks>
  Public WriteOnly Property Enabled() As Boolean
    Set(value As Boolean)
	  txtPatente.Enabled=value
      txtEmpresa_Proveedora.Enabled=value
      txtRepresentante_Legal.Enabled=value
      txtNombre_Responsable.Enabled=value
      
    End Set
  End Property

  ''' <summary>
  ''' Habilita o Desabilita el Control para solo lectura
  ''' </summary>
  ''' <value>True o False</value>
  ''' <remarks>ReadOnly</remarks>
  Public WriteOnly Property Lectura() As Boolean
    Set(value As Boolean)
	  txtPatente.ReadOnly=value
      txtEmpresa_Proveedora.ReadOnly=value
      txtRepresentante_Legal.ReadOnly=value
      txtNombre_Responsable.ReadOnly=value
      
    End Set
  End Property


#End Region
#Region "Eventos"

#End Region
#Region "Metodos"

  ''' <summary>
  ''' Metodo para asignar los datos al componente ctlTurismo
  ''' </summary>
  ''' <param name="tablaDatos">DataTable donde se obtienen los datos</param>
  ''' <remarks></remarks>
  Public Sub AsignarDatos(ByVal tablaDatos As DataTable)
    Me.txtPatente.Text= tablaDatos.Rows(0)("Patente").ToString
    Me.txtEmpresa_Proveedora.Text= tablaDatos.Rows(0)("Empresa_Proveedora").ToString
    Me.txtRepresentante_Legal.Text= tablaDatos.Rows(0)("Representante_Legal").ToString
    Me.txtNombre_Responsable.Text= tablaDatos.Rows(0)("Nombre_Responsable").ToString
    
  End Sub

#End Region
End Class
